Top 10k strings from Utility Compilation 79 (19xx)(-).trd
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Compilations - Utilities & Educational & Various / Sinclair ZX Spectrum - Compilations - Utilities & Educational - [TRD] (TOSEC-v2007-01-01) /
Back to the directory listing
43 "23875" 21 Transparen 14 Scroll righ 14 Scroll dow 14 Miscellaneou 14 Bright grid 10 xwvmkZYXWVTNK7% 9 /*****************************/ 8 7 w$w$w$w%%% 7 k(5) <-DECREASE INCREASE-> (8) 7 k PRESS ENTER WHEN READY 7 k ENTER CODE: 7 k 7 ^#V#N#F#{= 7 ^#V#N#F#*x 7 ZX/Alphaco 7 Whole scree 7 Wash textur 7 View scree 7 Version numbe 7 Treble widt 7 Treble heigh 7 Textured fil 7 TLWMIYfmwtzl 7 Single densit 7 Select paper colour 7 Select ink colour 7 Select fill texture 7 Select border colour 7 Select 7 Save file .. 7 Right justif 7 Remove gri 7 Re-scale windo 7 Overwrite (Y/N)? 7 Normal widt 7 Normal heigh 7 Merge file .. 7 Merge current 7 Load file .. 7 Load current 7 Left to righ 7 Left justif 7 Last windo 7 Invert windo 7 Grey-scale dum 7 Found file: 7 Font edito 7 Flip vertica 7 Flip horizonta 7 Erase file ... 7 Edit textur 7 Double widt 7 Double heigh 7 Double densit 7 Define windo 7 Cut, clear & past 7 Cut & paste windo 7 Clear windo 7 Clear whole font 7 Clear scree 7 Clear & re-scal 7 Change colou 7 Catalogue 7 Capture fon 7 @@@@@@@@@@@@@@ 7 =($=(.=(2=(6=(@=(H 7 8Edit textur 7 8Edit brus 7 *^[&%>}/,-]'$<{?.+ 7 *********************** 7 'ZXCVASDFGQWERT1234509876POIUY 7 Font Editor 6 w+w+w+<w+w 6 start=start+1 6 Version 1.5 C 6 Kkommentari 6 EFGHJMQRSUWXYZ 6 Ddata rovd 6 Adapted by D100 Krotov V 6 "]\w#6$#6= 6 "27");"h"; 6 char *s; 6 Leningrad 1991 5 pE^ATX KOPII 5 katalog 5 kalxkulqt. 5 URS-LW:K5 kURS-PR:K8 kURS-WR:K7 kURS-WN:K6 5 BETA Lines 5 A^.STR:e5 kON.STR:e8 lIST-WR:e7 lIST-WN:e6 5 @ BAJT 5 /* Hisoft C */ 5 ! ! 5 4 wKL@^ITX SLOWO 4 wKL@^ITX MAG 4 tekstowyj redaktor 4 need an lvalue 4 lENTA 0 4 kURSOR W 4 i$(interface,1 4 UNIBASE*wersiq 09 4 PRINTER, ADRES WOZWR 4 INTERW. |KZEMP 4 DISK 1-4 : 4 BpE^ATATX 4 @ukp PREFIKS 4 <cccccccJCUe 4 6r#6U#6S##6m###6r#6U#6S##6b 4 6l#6A#6T##6b###6l#6A#6T##6m 4 /* Standard Function Library */ 4 +"W\#"S\"K\6 4 ###~#fo###~#fo#~#fo 4 ###~#fo###~#fo 4 #"a\"c\"e\>82 4 "tlw.mel+" 4 "27");"C"; 4 nOMER : 4 da, STR. 4 K=K/[IFT S=S/[IFT E=K/[+S/[ e=E+S/[IFT 4 mETKA:kODY UPRAWLENIQ 4 4 3 interface=255 3 interface=0 3 e 3 a$="presents": 3 YRAWN.:eo sVATX :ed sFORMIR:ek 3 Xkomentari 3 W.POLE:Ex pR.POLE:ex uST.TAB:ee cWETA :ei 3 TE.SIM:K0 sTE.STR:K9 sTE.KON:e9 sTE.WSE:eq 3 STAWKA:E{ tEKST<<:Sj >>tEKST:Su >tEKST<:er 3 R1LIST:e3 wN1LIST:e4 tABUL. :K1 wST.kup:S{ 3 OWTOR :Ek sTER.BL:El pOISK :E~ rAZMER :ec 3 ONTUR :E} mARKER :Em rEGISTR:K2 {RIFT :em 3 LOW-LT:K3 sLOW-PR:K4 pRED-PR:Sc iDTI-ST:Et 3 KL.WYR:Eo pERENOS:Ec wYR.RAZ:e2 wKL@^-$:e{ 3 E^ATX :Ez pAR.PE^:Ep iZM.kup:Ee kATALOG:Es 3 A^ALO :Ef kONEC :Eq pRED.LI:Eg sL.LIST:Ew 3 ALXKUL:es tAJMER :e~ wYHOD :Sj >b\JSIK:Ei 3 AGRUZ.:Ed sOHRAN.:Ey sTERETX:Eu fORMAT :Ea 3 A(N,M));A(N,M): 3 ;"porqdok!": 3 26502,21497 3 23298 3 (a/255.99999 3 ########################## 3 "tlw+.drv" 3 "TLW.MEL+" 3 "DEBUGBAZ": 3 "B:instr " 3 --argv; 3 2 ~~````~~~~ 2 { int i,k;struct fileinf buf[64]; 2 vkeep stre 2 use a predeclared structure for parameters 2 undefined variable(s) 2 undefined variable 2 undefined label: 2 type should be function 2 too much initialisation data 2 this variable was not in parameter list 2 structure cannot contain itself 2 storage class not valid in this context 2 pcop.extCpcop.prgC 2 pbstack overflow 2 pE^(u)/pW(n)/(q)? 2 pE^(g)/pW(t)/(j)? 2 pEREM(r)/pE^(p)/w(q)? 2 pEREM(k)/pE^(z)/w(j)? 2 p(62221)+22)*64-a) 2 not in switch 2 not in loop or switch 2 not in loop 2 not a preprocessor command 2 not a defined member of a structure 2 no arrays of functions 2 need a type name 2 need a pointer 2 need a constant expression 2 need a : to follow a ? - check bracketting 2 najti! nOW? y 2 najti! nOW? L 2 multiple use of identifier 2 multiple default statements 2 missing 'while' 2 missing ')' in function declaration 2 missing ' ' 2 macro buffer full 2 illegal parameter type 2 he wrong file, find another header 2 goto needs a label 2 generated code area is full 2 expecting a primary here 2 duplicate declaration of structure tag 2 duplicate declaration - type mismatch 2 duplicate declaration - storage class mismatch 2 duplicate declaration 2 direct execution not possible when translating 2 define include diagnostlist direct error translat 2 cannot use this operator with float arguments 2 cannot open file 2 can only define identifiers as macros 2 can only call functions 2 bad type combination 2 bad operand type 2 bad function return type 2 bad formal parameter list 2 bad declarator 2 bad declaration 2 bad character constant 2 a=interface: 2 a$="The adaptation for ": 2 a$="St.Petersburg 1991": 2 a$="SII & MELsoft": 2 _colour(h,i) 2 YRAWN.:ej sVATX :el sFORMIR:er 2 Y$(I)>"9") 2 W.POLE:Em pR.POLE:em uST.TAB:et cWETA :eb 2 Type y to run: 2 TE.SIM:K0 sTE.STR:K9 sTE.KON:e9 sTE.WSE:ez 2 Start tape then press SPACE 2 STAWKA:Ei tEKST<<:Sq >>tEKST:Se >tEKST<:eh 2 RESTRICTION: use assignment or move() to initialise automatics 2 RESTRICTION: macros may not have parameters 2 RESTRICTION: cannot nest includes 2 RESTRICTION: can't manage initializers yet 2 RESTRICTION: Floating Point not implemented 2 RESTRICTION : floats not implemented 2 R1LIST:e3 wN1LIST:e4 tABUL. :K1 wST.kup:Si 2 POCMOTP KAPTOTEK 2 OWTOR :Er sTER.BL:Ek pOISK :Ex rAZMER :ew 2 ONTUR :Eo mARKER :Ev rEGISTR:K2 {RIFT :ev 2 MELsoft & SII presents 2 M;"- ";B$(M);": ";A$(N,Y 2 LOW-LT:K3 sLOW-PR:K4 pRED-PR:Sw iDTI-ST:En 2 LIMIT: no more memory 2 LIMIT : too much global data 2 LIMIT : too many types 2 LIMIT : too many case statements 2 LIMIT : name table full 2 LIMIT : local symbol table full 2 LIMIT : global symbol table full 2 LIMIT : expression too complicated - too many operators 2 LIMIT : expression too complicated - too many arguments 2 KL.WYR:Ej pERENOS:Ew wYR.RAZ:e2 wKL@^-$:ei 2 INVALID FILE 2 HISOFT-C Compiler V1.1 2 E^ATX :Ep pAR.PE^:Eg iZM.kup:Et kATALOG:Ec 2 ERROR - 27 - undefined symbol 2 Destination of an assignment must be an lvalue 2 Copyright O.C.P. 1985 2 Cannot initialise this (disallowed type) 2 Cannot initialise this (disallowed storage class) 2 Bw b\JSIH-STR. 2 Bw bEJSIK-STR. 2 A^ALO :Ea kONEC :Ez pRED.LI:Eu sL.LIST:Ed 2 ALXKUL:ec tAJMER :ex wYHOD :Sq >bEJSIK:Eb 2 AGRUZ.:El sOHRAN.:Es sTERETX:Ee fORMAT :Ea 2 @FISWUAPR[OLDXT]ZJKYEGMC^NQH\VB_`fiswuapr{oldxt}zjkyegmc~nqh|vb! 2 @ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~! 2 ???????? ? 2 ;"navmite klawi{u dlq prodolveniq": 2 ;"katalog?": 2 ;"imq fajla " ;: 2 ;"Enter control codes to be sent"'"to the printer to select this"'"mode, separated by commas ?"'; 2 ;" dlq pPOdOlvEHiq !" 2 ;" HAvMiTE "; 2 64058,1310 2 542 abonentow ats ne obnaruveno 2 48006,17530 2 12345,12345 2 /g}/o#:#w<2#w 2 /*==!=++--&&||<=<<>=>>-> 2 /* O.K! */ 2 /* Copyright (C) 1984 Hisoft */ 2 /* */ 2 ...........................MOVE 2 ------------------------------- 2 ,," 3A 2 *sT.pETERBURG* 2 *aDAPTIROWANO 13.2.1992* 2 *STEP BACK 2 **m~#"*mo& 2 ***** LPT-driver ****** 2 *&-!~VU 2 * * 2 (Y$(I)<"A" 2 $$=? STXW<>RP|^&OQ+-*/% 2 ###~#fo#~#fo 2 "ub.font " 2 "pr40/50R" 2 "LPT-driver instaled" 2 "Control codes to select mode:" 2 "A:12345678" 2 "27");p$;: 2 "27");"w"; 2 "27");"s"; 2 "27");"@";: 2 "23303"+N, 2 "23.08.87" 2 return i; 2 putc(i,2); 2 putc(h,2); 2 kUNXKOW & sMY[LQEW 2 if (i<0 | i>7) return -1; 2 iSK(f)/zAM(s)/(q)? 2 iSK(a)/zAM(y)/(j)? 2 _setover(on); 2 O.Przesmycki wg. YC 2 Myrmidon Software 1986 2 : does not follow a ? properly 2 1991 SII" 2 1991 SII ****** 2 !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ 2 while (argc--) 2 unsigned addr,len; 2 ster"STR"? L 2 ster"STR"? D 2 static int c; 2 static char *result; 2 static char *cs; 2 static bc,de,hl; 2 rsec(1,0,0,buf); 2 return min; 2 pica/elita 2 hl=BUFF; 2 for(i=0;i<16;i++) 2 for (i = 0; i < 4; ++i) 2 de=TREC*256+SECT; 2 char ns,s,t; 2 char name[8],typ[1]; 2 char *a; 2 char *a, *b, *c; 2 argv = ¶m_byte_count + argc; 2 argc = param_byte_count/2 - 1; 2 _dos(bc,de,hl); 2 FILE *fp; 2 { for(k=0;k<8;k++) 2 printf("\n"); 2 printf("%c",prichar(buf[i].name[k])); 2 if (*argv < min) min = *argv; 2 ret 2 E RPW !"#$%&'()*+,-./DDDDDDDDDD:;<=>?@LLLLLLLLLLLLLLLLLLLLLLLLLL[\]^L`LLLLLLLLLLLLLLLLLLLLLLLLLL{|}~ 2 23300 2 0xed,0x5b,&de, 2 0xed,0x4b,&bc, 2 0x2a,&hl, 2 <<< 2 1 ~ug- pokrowskie worota- trubnaq plo}adx 1 ~astnoe lic 1 ~The Last Word ...~ 1 ~TLW64BASIC~ 1 |tlw.mel+C 1 |TLW.MEL+B) 1 {MCT21.EXCH 1 {MAST.SUMB 1 { return (c << 32) ? '?' : c ; } 1 zakn Cam?CD 1 zMFU 3.01Bd 1 z$="cuke.z.h" 1 ystand.3 D 1 ystand.2 D 1 yobr.1 D 1 yDBASER-RB- 1 y 1 wwedite tekst (do 128): 1 wstawka-STRING 1 wsego = 1 wsec(NSEC,TREC,SECT,BUFF) 1 wires=wires+128 1 wertik. liniq 1 wMF B 1 w;",168"'" B 1 w$(z)=" ": 1 w$(a)=" ": 1 w srednem= 1 w kommentariqh ne nuvdaetsq.. 1 w komentariqh ne nuvdaetsq 1 void srand(n) 1 void qsort(list, num_items, size, cmp_func) 1 void puts(s) 1 void poke(address, value) 1 void long_set(a, n, d) 1 void long_multiply(c, a, b) 1 void long_init(a, n1, n0) 1 void long_copy(c, a) 1 void long_add(c, a, b) 1 void free(block) 1 void fputs(s, fp) 1 variable initialisation 1 uve opredelen 1 utline:eO Markers:eV CAPS/lc:c2 Chrs/ln:EV 1 urs-lt:c5 Curs-rt:c8 Curs-up:c7 Curs-dn:c6 1 unsigned strlen(s) 1 ukavite imq: 1 uMF mcodeC 1 typedef struct _header HEADER, *HEADER_PTR; 1 typedef int FILE; 1 typedef char * __char_ptr; 1 tub.code C 1 too many characters - max is 10 1 tolxko fajl........F 1 to be available, 1 tlwrus CP 1 tlw2 CP 1 this program's entry point 1 there must be a name 1 text file verified 1 t$="art.ep*5" 1 t$="art.any2" 1 t$="art.any1" 1 t$="art.a1.5" 1 t$="art.37*5" 1 t$="art.12*5" 1 t$=" ": 1 sub.font C 1 sty-ln:EJ Cpct-ln:EL Rfm-par:ER 1 struct fileinf 1 struct _header 1 st/rgd:eJ W-wr/sp:eW Case>ln:E2 Incld-$:EI 1 sohr.subd/fajl. 1 sjak'^'^<^ 1 sizeauto 1 sUNIBASE+B{ 1 sTERETX str? (d) 1 sM.FILES!B 1 sGOTICA C< 1 sFUTURE C< 1 s$="select": 1 s$="right": 1 s$="left": 1 s$="down": 1 s#r#w#q#pO 1 rsec(NSEC,TREC,SECT,BUFF) 1 rnt-tx:eP Prnt-gd:eG Tokn-pg:eT Catalog:eC 1 rKOI 7H2 C< 1 r;" Space"; 1 q;"<SPACE>" 1 q;"<ENTER>"' 1 q;"<CS>+<SS>"' 1 q;" ": 1 pust.pole= 1 printer, output call 1 plot(on,x,y) 1 pcop.prgC` 1 parity=on+odd 1 parity=on+even 1 parity=off: 1 pUSK-NAVMI ! 1 p-1-ln:E3 Dn-1-ln:E4 Tab-key:c1 PCT-key:sI 1 p(62221)+22)*64-a)" 1 p$=" Standard PCT prefix = ": 1 p$;"(none)" 1 p CX 1 ord-lt:c3 Word-rt:c4 Sent-rt:sW Goto-ln:eN 1 oq'BETA TR'"' 1 oq 'BETA TR'"'' 1 ol<1st:E5 Col>end:E8 Page-TL:E7 Page-BL:E6 1 oka"'''''" 1 oad-tx:eL Save-tx:eS Eras-fl:eE Format :eF 1 o1=s2-s1+1 1 o&[~2'\#~2(\! 1 nsert :eI Txt<<mv:sQ mv>>Txt:sE >>Txt<<:EH 1 necifrowoj kl` 1 necifr.dannye 1 ne bolee 8 simwolow! 1 navmite klawi{u 1 nO:qRLYK:kONTROLX PRINTERA 1 nAJDEN! nOW? (d) 1 n$="robotron" 1 n$="epson" 1 mAG. (0) & 1 lo=single-256 1 lo=double-256 1 lo=BAUD-256 1 line(on,dx,dy) 1 less 000 1 l-1'st:eA Fl-last:eZ Up-a-pg:eU Dn-a-pg:eD 1 l$="Disk Version 4.03" 1 kURSOR NA 1 kELITE C 1 k=base+186 1 k$="by Alexander V. Kunkov" 1 k$=" ": 1 j,d;"B npeqocma 1 j$="MEL soft 1 interface>18 1 interface= 1 interface<1 1 int strcmp(s, t) 1 int sign(n) 1 int rand() 1 int peek(address) 1 int min(param_byte_count) auto 1 int max(param_byte_count) auto 1 int ispunct(c) 1 int isprint(c) 1 int iscntrl(c) 1 int isascii(c) 1 int isalnum(c) 1 int atoi(s) 1 int abs(n) 1 input parameters 1 indeks polq? 1 indeks formata 1 ind.polq E: 1 imq fajla? 1 i$(interface,2 1 h$="No: Label: Control tokens: ": 1 goriz.liniq 1 g;"' (";g;")" 1 g$=g$+f$(n 1 free=end-start: 1 free=end-start 1 free: 1489K 1 free: 1489 1 format ne opredelen 1 fajl:stand.3 1 fajl:stand.2 1 fajl:obr.1 1 fajl:UNIBASE+ 1 f;"' (";f;")";: 1 extern unsigned strlen(); 1 extern char *strcat(), *strcpy(), *calloc(); 1 extern char *fgets(), *gets(), *sbrk(); 1 ept-tx:eR Kill-tx:eK Exch-tx:eX Word-ct:EW 1 e60 1 display parameters 1 disk[1-4]: 1 dA, STRKA 1 char prichar(c) char c; 1 char *strcpy(dest, source) 1 char *strcat(base, add) 1 char *sbrk(n) 1 char *gets(s) 1 char *fgets(s, n, fp) 1 char *calloc(n, size) 1 char _rnum[4]; 1 cc51d Cpb 1 cc2 Cpb 1 cc1 Cv 1 cart.37*5C 1 c;"' ";c;"-" 1 c2=s1+v1-1 1 by Andrew MOA 1 bpRINT-W 1 beep(duration,pitch) 1 baud rate>19200 1 baud rate= 1 baud rate<10 1 base=23296 1 bNItem already in recor 1 b* bEJSIK STR. 1 arg-lt:eM Marg-rt:EM Tab/int:ET Colours:EB 1 ap-chr:c0 Zap>>ln:c9 Zap>>fl:E9 Zap-all:EZ 1 alc'tr:EC Tmr-set:EX Quit-it:sQ >>Basic:eB 1 addr=53000 1 a;" data,";: 1 a+l;".";a$(a+l,1 1 a$="y / n": 1 a$="for 'PROFI' :": 1 a$="exit from HELP modul": 1 a$="any type of Prn.:": 1 a$="ZXLPRINT3 -3": 1 a$="V. KROTOV": 1 a$="UiPs - 1": 1 a$="The autor of driver ": 1 a$="ROBOTRON - 1": 1 a$="QWERTY - 0": 1 a$="Press 'Spase' inoder to": 1 a$="Please wait": 1 a$="Please wait": 1 a$="PROFI - 0": 1 a$="PENTAGON - 2": 1 a$="PAGE 7": 1 a$="PAGE 6": 1 a$="PAGE 5": 1 a$="PAGE 4": 1 a$="PAGE 3": 1 a$="PAGE 2": 1 a$="PAGE 1": 1 a$="MELsoft & SII": 1 a$="M 80 - 6": 1 a$="Is it correct ?": 1 a$="Input code of printer's type": 1 a$="I.SMISHLIAEV": 1 a$="Get your choise:": 1 a$="EPSON - 0": 1 a$="D 100 - 5": 1 a$="CUKE - 1": 1 a$="CM 6337 - 4": 1 a$="CM 6313 - 3": 1 a$="CM 6312 - 2": 1 a$="BETA unit by :": 1 a$="Are you want HELP ? (y/n)": 1 a$="A. KUNKOV": 1 a$="27,76,960" 1 a$="27,75,480" 1 a$="27,65,8" 1 a$="1,2,3,4,5 or 6": 1 a$="(PC0-X,PC1-STROB,PC2,3-NOTbusy)": 1 a$="(IFSP)": 1 a$="(Centronics)": 1 a$="( Keyboard )": 1 a$=" One more time ? (y/n)": 1 a$(a)=a$(a+1 1 _setover(on) 1 _dos(BC,DE,HL) 1 _beep(DE,HL) 1 \art.any2C 1 [Use/Next/Quit] ? 1 [Revise/Print/Quit] ? 1 [Find/Subst/Quit] ? 1 [ENTER]-No/Yes 1 ZAP to CTL ? [y] 1 Your Catalogue.....U 1 Your CATALOGUE 1 Yes, line 1 Y:Cont/Brea 1 Y koord 064 1 Y dlq podtw 1 Y coord 000 1 Xkommentari 1 X koord 000 dlina 111 1 X coord 000 Length 000 1 X CTPOKAX MEH 1 X PE 1 Writeln bu Andrew MOA 1 Waiting... 1 WAIT KEYPRESS 1 W-1STR:e3 wN-1STR:e4 tAB-WPR:K1 pst-UST:Si 1 Vertical line 1 Version 1.5 D 1 V 1 Up into TLW ... 1 URS-LW:K5 kURS-PR:K8 kURS-WW:K7 kURS-WN:K6 1 UNIBASE+ r 1 U-izmenitx 1 Typ sec. 1 Total = 1 The Last Word... 1 That in standart version free spase - biger !!!" 1 Tel. 1301995 (>22.00) 1 Tart.12*5C 1 Tape/Drive/Programming/Execute/ List/Restore/Save/Catalogue/Zap? 1 Tape-on/key! 1 Tape loading error 1 Tape [0] or 1 TO"''''"HA 1 TLW printer control"'" token file content."'"2 - 1 TLW command key-set."'"3 - TLW translation lists."'"4 - Exit." 1 TLW R*B BK 1 TLW 6312BM 1 TE HOMEP "'Y 1 TASWORD Bj 1 T$="D.BASER+" 1 Stop tape 1 Start tape 1 St.Petersburg 1991 1 Spacing Copies 1 Showing Micro-print 42/51 and with 2 recs/page 1 Ser , Press Any Kay , Please . 1 Select drive * 1 Screen and print translation lists. 1 STR. nO: 1 STAWKA:Ei tHT<<WL:Sq PR>>tHT:Se >>tHT<<:eh 1 START=8100 1 SHOWING MICRO-PRINT 42/51 *RATCOPY* COLLECTIO 1 SAVE name ? 1 SAGA SYSTEMS LIMITED 1 S-{ag mimo 1 R/KRAJ:Em lW/KRAJ:em tABULQT:et cWET/AT:eb 1 Pwladimirowi 1 Psubd + fajl....Ftolxko fajl.... 1 Programming mode on 1 Programmable tape / disk copie 1 Print copy no 1 Press any ke 1 Press 'Y' to erase! 1 Play the tape 1 PSUMMARY SORTED BY DEP 1 PSORTED BY NAME, 1 PER SCREE 1 PRINT 40/50 1 PRINT # 9;AT Y,X; 1 PProgram+file...FFile only...... 1 POBKA -4": 1 POBEPKA 3A 1 PLEASE WAIT 1 PE^ATX NA PRINTERE 1 PCOPIER+Bw 1 PAMM B KAPTOTEKE ";n: 1 P PE3EPB 1 Output disk full ! 1 One Del file 1 OWT-TH:Er sTER-TH:Ek nAJTI-T:Eh s^-SLOW:ew 1 OWN-ST:ej sVATX-S:el rFM-ABZ:er 1 OW/NER:Ej pERENOS:Ew zAGL>ST:e2 sTRING$:ei 1 ONTUR :Eo mARKERY:Ev zAG/STR:K2 dL/STR.:ev 1 O: ";U$''' 1 Null text= 1 Nsled.stranica..#=> na 1-9 zap..0<= na 1 zapisx.B<= k 1-j zapisiPwyw.na printer.Uizm.wrhn.zapisxEudalitx wrhn zpOsbr.werhn`` zp Cskopir. wrhn zpSpoisk w fajle..Twsego/w srednemRwybor formata..Mosnownoe men`..Qwyhod iz men`.. 1 Non-numeric data: 1 No:Label:Control tokens. 1 No such format define 1 No room for file 1 No address has been|provided, so we have|used a Null Text|filler instead 1 Name and address labels, 3-u 1 Name Type Length Start Line 1 NNext page......#Advance 1-9 rcs0Back one recordBBack to 1st recPPrint..........UUpdate top rec.EErase top rec..OOmit top recordCCopy top recordSSearch the fileTTotal/Average..RSelect report..MMain menu......QQuit this menu. 1 NDisk VERSIO 1 N$="zakn": 1 Mikro-prt Y/ 1 Micro-Prt Y/ 1 Max. length of file: 1 Mart.a1.5C 1 MASTERFILE Beta V 1 M+A;"- ";C$(M); 1 M+A,"- ";C$(M); 1 Linia 9995 pozwala zapisac niniejszy program na tasmie i zapis zweryfikowac. O.Przesmycki, wg Y.C. 1 Line-print the Print Control Token page. 1 Line-print the Command Summary page. 1 Line across 1 Line No: 1 LOW-WL:K3 sLOW-PR:K4 pRED-PR:Sw sTR.-nO:En 1 LET O$='50' 1 LET O$='40' 1 Kempston lines 1 KO CTPOK B KA 1 KO 3HAKOMECT 1 Issue 2.2 1986 1 Inverse Y/ 1 Insert master disk 1 Insert disk, press any key 1 Insert command 1 Insert OUTPUT disk 1 Insert INPUT disk 1 Input FILTER name 1 Indescomp = Morex 1 Iinwers.Y/ 1 INTERWAL kOPII 1 INST.STUB5 1 INSERT DISKS INTO THE DRIVES 1 INGLE PAGE: 1 INCLUDE string 1 Hiq, AdPECA TO@KiOCTAHOBA i C@ET@iKA KOMAHd." 1 HTEP -6" : 1 HO ";C-Z;" PE 1 HL,(CHANS) 1 HEBEPHOE 3AdAHiEY 1 HEADER _base, *_allocp; 1 Give report re 1 Give data re 1 Give File Name 1 GO TO 9995 1 GO SUB 9991 1 G R A F I K A 1 Found! New? [y] 1 Files selected: 1 File:MELSoft. 1 File too long 1 File not start 1 File name: 1 File 'pcop.prg' not found. 1 FILTER ]Y]: 1 FAST c C: 1 Error catalog! 1 Erawen kl`~u....Une rawen kl`~u.Lmenx{e kl`~a...Gbolx{e kl`~a...Spoisk w stroke.Mosnownoe men`.. 1 Enter text 1-128 chars. 1 End/Beep/Pause/Wait/bAck/Skip/ Copy/Kill? 1 Eart.ep*5C 1 Eart.any1C 1 E^ATX :Ep mEN@-P^:Eg uST/rst:Et kATALOG:Ec 1 ESC,#4B,112,#81 1 ESC,#41,#87 1 EEqual to.......UUnequal to.....LLess than......GGreater than...SString search..MMain menu...... 1 ECTBO 3HAKOMECT B CTPOKE 1 ECTBO O 1 E: ";(C$(N))'A(Z,N): 1 E: ";(B$(N))'A$(Z,Y 1 E$="O%ibKA dECqTi@HOgO 3HA@EHiq 1 E$="O%ibKA dBOi@HOgO KOdA 1 E$="O%ibKA %ECTHAdcATiPi@HOgO KOdA 1 E$="HEBEPHOE 3AdAHiE": 1 E$="HEBEPHAq KOMAHdA": 1 E$="3HA@EHiE O@EHx BEliKO 1 E","S-CTPE 1 E","K-KAPT 1 E","C-KOCM 1 E -2" 1 Dokno dlq dannyhLzagolowok......Bprqmougolxnik..Hgorizont.liniq.Vwertik.liniq...Mpredydu}ee men` 1 Disked by PAPIR & 1991 1 Disked by KORDIAL 1991 1 Directory full 1 Data ref X: 1 DSINCLAIR ZX SPECTRU 1 DISK(1-4): 1 DISK DOESN'T PRESENT 1 DDepartmen 1 DData from recd.LLiteral text...BBox............HHorizontal lineVVertical line..MPrevious menu.. 1 DALITX:K0 uBR>STR:K9 uBR>>FL:e9 uBR-WSE:e# 1 D$(N)>D$(N+1 1 D$(N)=D$(N+1 1 D$(N)=A$(N,Y 1 Cursor at 1 Current file: 1 Ctekstowyj......Ncifrowoj.......Mpredydu}ee men` 1 Copyright 1 Continue (Y/N) 1 Catalog Disk to TLW 1 Cart.studB 1 CUR/KEM/SP/EN/DL/Cop/Bel/Paus/DrWt/End/Q/A/Tp/Sl/Us/Zp/Kl/Mv/Ren 1 CTPOB: ";Z: 1 CTPOB"''': 1 CTPOB"''"7- 3A 1 CTPOB"''"6- CO 1 CTPOB"''"5- K 1 CTPOB"''"4- CO 1 CTPOB"''"( 1 CTPOB COCTAB 1 CTPE BAM H 1 CTPA: ";Z'"CBO 1 CTPA: ";N;" / ";Z''' 1 CTPA ";M;" ";Z'"K 1 CTP No. ";N''': 1 CTP No. ";N''' 1 COPY4.ASC: 1 COPY FILE: 1 CKA -8": 1 CKA -9" 1 CK -7": 1 CCharacter......NNumeric........MPrevious menu.. 1 CC51D+ BM 1 CATALOGUE 1 CALCULATOR 1 C$(P);":"; 1 C$(N);":"; 1 C$(M);": "; 1 Break key pressed 1 Bart.hlp6C 1 Back into TLW ... 1 B^ Basic line 1 BUT REMEMBER!!! 1 BPrint-in 1 B$(P);": ";A$(N,Y 1 B$(N);": ";A$(Z,Y 1 B$(N): 1 B$(M);": ";A$(N,Y 1 Aww.now.zapisej.Cwybor formata..Dwywod na |kran.Eredakt.formata.Lzagruzitx fajl.Nimenowatx pole.S* revim poiska.Iinwers.wyborki.Rsbros wyborki..Pudalenie wyb.zpTwsego/w srednemVsohr.subd/fajl.UUSER-men`...... 1 Average = 1 Atelefon, adre 1 Arg not numeri 1 Are you really sure 1 Ap.126-03-47 A.KUNKO 1 Aotkrytx pole...Rizmenitx pole..Ezakrytx pole...Gzadatx pole....Nlistatx polq...Pawtozapros polqDwywod na |kran.=sledu`}.zapisx.Mosnownoe men`.. 1 Already define 1 Adob.now.|lementRizm. |lement...Eudalitx |lementNsled. |lement..Cskopir. format.Xudalitx format.Dwywod na |kran.Mpredydu}ee men` 1 Adob.now.format.Rizmenitx formatMosnownoe men`.. 1 A^<STR:e5 kON>STR:e8 sTRN-WW:e7 sTRN-WN:e6 1 A^-FJL:Ea fL-STER:E# wW-A-PV:Eu wN-A-PV:Ed 1 ATb?(0-HET)" 1 ASelect from allLSelect from selDDisplay/Print..MMain menu...... 1 ART1STUD","ART STUD" 1 ART STUDIO installation 1 ALK'TR:ec tAJMER :eh oTMENA :Sq >bEJSIK:Eb 1 AGR-th:El wYGR-th:Es sTER-FL:Ee fORMAT :Ef 1 ADVANCED DISK SERVICE ver 2.0 1 ACApoisk w fajle..Lpoisk w wyborkeDwywod na |kran.Mosnownoe men`.. 1 AAdd new format.RReview format..MMain menu...... 1 AAdd new elementRReplace elementEErase element..NNext element...CCopy format....XDelete format..DDisplay/Print..MPrevious menu.. 1 AAdd item.......RReplace item...EErase item.....NNext item......DDisplay/Print..GGet item.......PPrompt items...=Another record.MMain menu...... 1 AAdd a record...CChoose a reportDDisplay/Print..EEdit format defLLoad a file....NName Data ref..SSearch the fileIInvert selectn.RReset selectionPPurge sel recdsTTotal/Average..VSave Prog/File.UYour Catalogue. 1 A.V.KUNKOV 1 A(Z,N));A(Z,N): 1 A(N,P));A(N,P): 1 A$=" reg": 1 A$=" ": 1 A$: 1 A$(C,D*A): 1 A 'A') KO 1 A 'A'"''" 1 @rst PREFIKS 1 @art.hlp5C 1 @PCT prefix 1 @ bytes 1 >art.hlp4C 1 =art.hlp3C 1 <Programmable tape - disk copier PLUS was written by Nicolas Rodionov on 01.1991 specially for INTERCOMPEX. New features: more memory, more drives, full name (10 character), easy programming, more comfort and more, more, more ... 1 ;n;"...";d$(n)'': 1 ;art.hlp2C 1 ;a;" bytes,",a/ 1 ;N;"- ";B$(N): 1 ;N+A;"- ";C$(N): 1 ;DATE AREA 1 ;'"Select list 1 or 2 (or 0 = exit)then line to be modified."''" " 1 ;"~PROGRAMS BANK~ V3.00" 1 ;"wwedite famili` i nomer telefona"; 1 ;"with (just ENTER for find only)": 1 ;"wariant programmy": 1 ;"wWEDITE DWE PERWYE BUKWY FAMILII";''' 1 ;"velaem uspeha": 1 ;"type word to be replaced / found" 1 ;"type the name of the text file"; 1 ;"text file ";a$;" saved:"; 1 ;"tasword" 1 ;"sostawlennoj polxskimi programmistami i predstawlq`}ej soboj draiwer |krana, pozwolq`}ij rabotatx w dwuh revimah (40 i 50 simwolow w stroke) sohranqq pri|tom wozmovnostx standartnoj pe~ati" 1 ;"slowo dlq zameny / poiska" 1 ;"sistemnye fajly uve estx na diske.": 1 ;"rusificirowannyj"; 1 ;"revimy";: 1 ;"revim pe~ati 1 ;"programmu PRINT 40/50 RL"; 1 ;"press y for yes"; 1 ;"predstawlqet"; 1 ;"poslednqq stroka: nomer ? ";: 1 ;"populqrnoj programmy": 1 ;"perepisatx ? 'd'": 1 ;"o{ibka pri ~tenii s diska.": 1 ;"o{ibka pri zapisi na disk!": 1 ;"osnownoj {ag pe~ati?(1-20)": 1 ;"n for no" 1 ;"line ";e: 1 ;"koordinaty at zada`tsq dlq komand PRINT i PRINT #9; nezawisimo drug ot druga " 1 ;"just press ENTER to load the"; 1 ;"imq obqzatelxno!": 1 ;"gruppa"; 1 ;"gruppa PENCRAFT predstawlqet russku` wersi` ": 1 ;"first text file on the tape" 1 ;"fajla dannyh s imenem """;R$;"""net na diske.": 1 ;"fajl s imenem """;C$( 1 ;"fajl dannyh s imenem """;C$( 1 ;"do you want to verify ";a$;" ?": 1 ;"dlq smeny formata naberite :": 1 ;"cc.code" 1 ;"and press ENTER" 1 ;"YOYR ADRESS -0" 1 ;"TLW for M80 will be"'" werking with driver like"'" in PROFI ."'" (Centronics)"'" PC0-X;PC1-STROBE;PC2,3-NOTbusy" 1 ;"Scaling factor="; 1 ;"Save to microdrive1 (y/n)";: 1 ;"STANDART ADR -1": 1 ;"S Z P/V C" 1 ;"S :pO%AgOByj PEviM"'"K :BypOlHEHiE" 1 ;"RUSSIAN FONT HAS BEEN DESTROYED IN RAM. I CAN'T LOAD ""ub.font"" FILE THAT IS NESSESARY TO RE- CREATE THIS FONT. PRESS <BREAK> TO EXIT OR ANOTHER KEY TO RETRY.": 1 ;"RUSSIAN FONT HAS BEEN DESTROYED IN RAM 1 ;"Q :3ApiCx HA Ml i ByXOd "'"R :pOBTOPHyj CTAPT"'"I :iMMiTAciq pPEPyBAHiq" 1 ;"Presents"; 1 ;"PENCRAFT"; 1 ;"OTlad@iK"''"pO3BOlqET i3u@ATx, BypOlHqTx i COXPAHqTx pPOgPAMMy B MA%iHHyX KOdAX."''"pPEdpOlAgAETCq, @TO pOlx3OBATElx3HAKOM C CiCTEMOj KOMAHd Z80."''"_KPAH TV OTObPAvAET 3HA@EHiq PEgiCTPOB, PEgiCTPOByX pAP, PEgiCTPA COCTO 1 ;"OK! VERIFY? Y/N": 1 ;"Name of text file for saving?": 1 ;"Loading Hisoft C"; 1 ;"Loading bytes": 1 ;"List ";d: 1 ;"Line length -",l: 1 ;"LOAD from -", 1 ;"KORDIAL'91"; 1 ;"Input halted": 1 ;"INSERT OUTPUT DISK" 1 ;"INSERT DISK WITH FILE ";q 1 ;"IF YOU WANT RUSSIAN / LATIN VERSION , THAN PRESS - 0 , or 1 - IF STANDART ." 1 ;"Free - ";free''"Insert next disk for read Cat."''"S-for save": 1 ;"File-name -",f$ 1 ;"File size -",l;" bytes" 1 ;"FILE NOT FOUND": 1 ;"F :uCTAHOBKA flAgOB"'"BR :3AdAHiE TO@Ki OCTAHOBA"'"P :3AdAHiE C@ET@iKA KOMAHd"'"P+ P- :i3MEHEHiE C@ET@iKA "'"Z :3AHECEHiE KOdOB"'"ENTER :iHCTPuKciq" 1 ;"Enter control codes to be sent"'"to the printer before a screen"'"dump, separated by commas ?"'; 1 ;"Change '"; 1 ;"BR D"; 1 ;"A B C D E H L :PEgiCTPy"'"BC DE HL SP IX IY:pAPy PEgiCTPOB"''" %ECTHAdcATiPi@HyE 3HA@EHiq"'" OKAH@iBA#TCq HA 'H'" 1 ;":"'"left right up down select" 1 ;"50 simwolow wstroke"; 1 ;"40 simwolow w stroke ": 1 ;"3anporp. ABCDEFGHIJKLMNOPQRSTU"' 1 ;"2. Printer" 1 ;"2 - Stop " 1 ;"1. Screen"; 1 ;"1 - One more time ": 1 ;"'";N$;"'";" su}estwuet !"; 1 ;"'";N$;"'";" ne najden": 1 ;" zn/lin" 1 ;" wyzywa`tsq komandoj 1 ;" stop bits" 1 ;" USER-men` ": 1 ;" MELsoft presents 1 ;" Liczba za TAB i druga liczba za AT ma zakres 0-247, bo 248-255 odpowiada nastepnej linii. " 1 ;" Insert Disk and Press any key" 1 ;" "'''"HOPMA 1 ;" Kod i instrukcje jak w liniach 9990-9992 trzeba wiec umiescic w swoim programie, aby moc pisac, poprzez"'" PRINT #9 (lub L PRINT #9)"'" ~zgeszczone~ ciagi znakow,jak tu pokazano." 1 ;" Jest to program demonstracyjny pisania 42 lub 50 znakow w linii przy uzyciu 1 ;" Are you want a catalogue "'" of your disk ? " 1 ;" ** SAGA SYSTEMS LIMITED **", 1 ;" y / n " 1 ;" gruppa PENCRAFT qnwarx 1991 g." 1 ;" " 1 ;" " 1 ;" 1 ;" 1 ; 1 :load "MCT21.EX" CODE 1 :Wr. bu Andrew MOA, 1301995 1 : SAVE a$ CODE 40000,start-40000 1 : K=K/[IFT S=S/[IFT E=K/[+S/[ e=E+S/[IFT 1 : 1 9art.hlp1C 1 999999999999999999999999999999999;;;88;888:::::::::8888888888;;99;88888;;;;;;;;;;;;;;;;;;8888;;99;88;;888888888888888888888888;9988;;;888888888888888888888888;998;;88888888888888888;88888888899888888888;888888888888888888;;99;;;88888888888888;88888888;;8;99;;888888888888888888888888888899;;;8888888888888;;;8888888888899;;;8888888888888;;;8888888888899;;;88;88888;8888;;;88888888;;899;;;8888888888888;;;8888888888899;;;88888888;8888;;;88888888888998888888888888888;;;888888888889988888888888;8888;;;8888888;88899;888888888888888;;;8888888888;99;;;;;;88888;8;;8;;;8888888888899;8888988888;8;;8;;;888888;888899;8888888888;8888888888888;888899;;;;;;8888;;;;;;;;;;;;;;8888889999999999999999999999999999999999898888888888888888888888888888999999999999999999999999999999999 1 999999999999999999999999999999999999::::::::::::::::::::8888:;;999;;;;;;;;;;;;;;;;;:::::;;;;;;;998888888888888888888888888888889988<888888888888888888888888<889988888888888888888888888;;88;8899888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889988;;;;;;;;;;;;88;;;;;;;;;;;;8899888888;8888;888888888888;88;889988;;;;;;;;;;;;888888888;;;;;889988;;8888888888888888888888;;88998888888888888888888888888;;;889988;;;;;;;;;;;;88;;;;;;;;;;;;8899888888;;888;888888888888;88;8899888888888888888888888888888888998 1 9999999999999999999999999999999999998::::::::::::::::::::::8:;;9999;;::::::;;;;;;::::::::::;;;;99;8888888888888888888888888888899;8888888888888888888888888888899;888888888888888888888888888;;99;8888888888888888888888888888899;8888888888888888888888888888899;8888888888888888888888888888;99;8;;;;;;;;;;;;888;;;;;;;;;;;8;998888888888888888888999999999999988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899;8888888888888888888888888888;9988888888888888888888888888888;9988888888888888888888888888888;99;8888888888888888888888888888;99;8888888888888888888888888888;99;8888888888888888888888888888;9999999999999999999999999999999999898888888888888888888888888888999999999999999999999999999999999 1 999999999999999999999999999999999888888888:::::::::888888888:;;99;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;99;8888888888888888888888888888899;88888888888888888888888888;;;99;888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888;8998888888;;8;;;;;;;;;;;;;;;;;;;89988888888;8;;;;;;;;;;;;;;;;;;;;99;8888888888888888888888888888899;8888888888888888888888888888899;8888888888888888888888888888899;8888888888888888888888888888899;8888888888888888888888888888899;8888888888888888888888888888899;8888888888888888888888888888899;8888888888888888888888888888;99;8888888888888888888888888888899;888888888888888888888888888889999999999999999999999999999999999898888888888888888888888888888999999999999999999999999999999999 1 999999999999999999999999999999999888888888:::::::::888888888:;;99;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;99;8888888888888888888888888888899;88888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888;9988888888888888888888888888888899888888888888888888888888888;;899888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899;8888888888888888888888888888899;8888888888888888888888888888899;888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889999999999999999999999999999999999898888888888888888888888888888999999999999999999999999999999999 1 999999999999999999999999999999999888888888:::::::::888888888:;;9988888888888888888888888888::;;9988888888888888888888888888888899888888888888888888888888888888999888888888888888888888888888889998889888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889999999999999999999999999999999999898888888888888888888888888888999999999999999999999999999999999 1 999999999999999999999999999999999888888888:::::::::888888888:;;998888888888888888888888888888;;9988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888998888888888888888888888888888889999999999999999999999999999999999898888888888888888888888888888999999999999999999999999999999999 1 979 platforma timirqzewskaq- butyrskij hutor 1 975 krasnye worota- komsomolxskaq 1 972 mendeleewskaq- sawelowskaq 1 971 rivskaq- marxina ro}a 1 966 ulica podbelxskogo- otkrytoe {osse 1 963 preobravenskaq plo}adx 1 962 preobravenskaq plo}adx- ulica podbelxskogo- semenowskaq 1 949 shodnenskaq 1 947 prospekt mar{ala vukowa- viwopisnaq ulica 1 946 belorusskaq- begowaq- polevaewskaq 1 945 dinamo- sawelowskaq 1 944 strogino 1 943 sokol- polevaewskaq 1 942 strogino 1 941 begowaq- polevaewskaq 1 938 uniwersitet 1 936 kaluvskaq- leninskij prospekt 1 934 solncewo 1 932 `go- zapodnaq- mi~urinskij prospekt 1 931 `go- zapodnaq- mi~urinskij prospekt 1 930 uniwersitet- leninskij prospekt 1 928 #- bal~ug- pokrowskie worota trubnaq plo}adx 1 927 kolhoznaq- krasnye worota 1 926 kolhoznaq- krasnye worota- dubna 1 925 #- kolhoznaq- krasnye worota 1 924 #- kolhoznaq- krasnye worota 1 923 #-kirowskaq 1 909 #- petrowskie worota 1 908 bibirewo- lianozowo 1 907 otradnoe 1 905 beskudniko 1 903 otradnoe- altufxewskoe {osse 1 902 bibirewo- platforma beskudnikowo 1 901 bibirewo- platforma beskudnikowo 1 8art.hlp0C 1 8TLPR3.EXC 1 8ART.STUDB= 1 89989999999999999999999999999999899898888888888888888888888888888999999999999999999999999999999999 1 888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888110 nahimowskij prospekt- ~ertanowskaq 1 8!?I% !!%!!>!?%> 1 8!?I% !!%!!>! 1 6uips.drvC 1 6pent.drvC 1 6m80 .drvC 1 6TLW64BS+Bo 1 6TLW64B C 1 6TLW2DAT+Bv 1 6CAT+TLW B- 1 62208,3072 1 61440,3840 1 5uips.linB2 1 5robotronC 1 5prof.drvB 1 5m80 .linBd 1 5m80 C 1 5lprn.linBB 1 5epson C 1 5d100 C 1 5cuke.z.hC 1 5cuke.z.gC 1 599 abonentow ats ne obnaruveno 1 598 odincowo- borwiha 1 597 abonentow ats ne obnaruveno 1 596 odincowo 1 595 abonentow ats ne obnaruveno 1 594 abonentow ats ne obnaruveno 1 593 odincowo 1 592 zwenigorod 1 591 odincowo- nem~inowka 1 590 abonentow ats ne obnaruveno 1 589 abonentow ats ne obnaruveno 1 588 abonentow ats ne obnaruveno 1 586 abonentow ats ne obnaruveno 1 585 abonentow ats ne obnaruveno 1 584 monino- pu{kino- noginsk- pos.~erkizowo- iwanteewka 1 583 myti}i 1 582 myti}i 1 581 myti}i 1 580 abonentow ats ne obnaruveno 1 579 abonentow ats ne obnaruveno 1 578 {eremetxewo- lobnq 1 577 abonentow ats ne obnaruveno 1 576 abonentow ats ne obnaruveno 1 575 himki 1 574 shodnq- firsanowka 1 57328,8208 1 573 himki 1 572 himki 1 571 himki 1 570 himki- lewoberevnaq 1 569 abonentow ats ne obnaruveno 1 568 abonentow ats ne obnaruveno 1 567 abonentow ats ne obnaruveno 1 566 abonentow ats ne obnaruveno 1 565 abonentow ats ne obnaruveno 1 564 abonentow ats ne obnaruveno 1 563 krasnogorsk 1 562 krasnogorsk 1 561 mitino-arhangelxskoe 1 560 istra 1 559 l`bercy 1 558 malahowka 1 557 l`bercy- tomilino- kraskowo 1 556 vukowskij 1 555 abonentow ats ne obnaruveno 1 554 l`bercy 1 553 kosino- uhtomskaq- l`bercy- nekrasowka- bykowo- tomilino 1 5522222222222222222 1 552 lytkarino- l`bercy 1 551 l`bercy- dzervinskij 1 550 kosino 1 549 abonentow ats ne obnaruveno 1 548 butowo- gorki leninskie 1 547 abonentow ats ne obnaruveno 1 546 domodedowo- klimowsk- podolxsk- serpuhow 1 545 abonentow ats ne obnaruveno 1 544 abonentow ats ne obnaruveno 1 543 abonentow ats ne obnaruveno 1 541 widnoe- pos.wilar 1 540 abonentow ats ne obnaruveno 1 539 klin- solne~nogorsk 1 538 abonentow ats ne obnaruveno 1 537 abonentow ats ne obnaruveno 1 536 zelenograd 1 535 zelenograd- mendeleewo 1 534 zelenograd- mendeleewo 1 533 abonentow ats ne obnaruveno 1 532 zelenograd 1 531 zelenograd 1 530 abonentow ats ne obnaruveno 1 529 bala{iha 1 528 reutowo- nikolxskoe 1 527 veleznodorovnyj- kupawna 1 526 }elkowo- frqzeno 1 525 kupawna 1 524 bala{iha 1 523 abonentow ats ne obnaruveno 1 522 veleznodorovnyj 1 521 bala{iha 1 520 abonentow ats ne obnaruveno 1 519 bol{ewo 1 518 abonentow ats ne obnaruveno 1 517 abonentow ats ne obnaruveno 1 516 kaliningrad 1 515 kaliningrad-myti}i 1 514 abonentow ats ne obnaruveno 1 513 kaliningrad 1 512 kaliningrad 1 511 kaliningrad 1 510 abonentow ats ne obnaruveno 1 509 abonentow ats ne obnaruveno 1 508 abonentow ats ne obnaruveno 1 507 abonentow ats ne obnaruveno 1 506 abonentow ars ne obnaruveno 1 505 abonentow ats ne obnaruveno 1 504 abonentow ats ne obnaruveno 1 503 abonentow ats ne obnaruveno 1 502 abonentow ats ne obnaruveno 1 501 abonentow ats ne obnaruveno 1 50000,15535 1 500 abonentow ats ne obnaruveno 1 499 strogino 1 498 strogino 1 497 shodnenskaq 1 496 shodnenskaq- planernaq 1 495 shodnenskaq- planernaq 1 494 shodnenskaq- planernaq 1 493 shodnenskaq 1 492 tu{inskaq 1 491 tu{inskaq 1 490 tu{inskaq- planernaq 1 489 beskudnikowo 1 488 beskudnikowo- poselok sewernyj 1 487 beskudnikowo 1 486 korowino- businowo 1 485 beskudnikowo- platforma nowoda~naq 1 484 beskudnikowo- platforma lianozowo 1 483 beskudnikowo- korowino 1 482 platforma okruvnaq- b.akademi~eskaq ul. 1 481 platforma degunino- beskudnikowo 1 480 beskudnikowo 1 479 medwedkowo 1 478 medwedkowo 1 477 medwedkowo 1 476 medwedkowo 1 474 platforma perlowskaq- platforma losx 1 473 medwedkowo 1 472 platforma losinoostrowskaq- babu{kinskaq 1 471 platforma losinoostrowskaq- babu{kinskaq 1 470 swiblowo- babu{kinskaq 1 469 }elkowskaq- golxqnowo 1 468 }elkowskaq 1 467 }elkowskaq- golxqnowo 1 466 }elkowskaq- golxqnowo 1 465 perwomajskaq- poselok wosto~nyj- frqzino 1 464 perwomajskaq 1 463 perwomajskaq- poselok wosto~nyj 1 462 }elkowskaq 1 461 }elkowskaq- perwomajskaq 1 460 }elkowskaq- golxqnowo 1 459 re~noj wokzal- onevskaq ul. 1 458 re~noj wokzal 1 457 re~noj wokzal- smolenskaq ul 1 456 re~noj wokzal- onevskaq ul. 1 455 platforma howrino- ul. lawo~kina 1 454 platforma howrino- ul. lawo~kina 1 453 kron{tadskij b-r - flotskaq ul. 1 452 wodnyj stsdion- re~noj wokzal 1 451 re~noj wokzal- ul.dybenko 1 450 wojkowskaq- koptewo 1 449 platforma rabo~ij poselok- dawydkowo 1 448 platforma setunx- movajskoe {osse 1 447 platforma rabo~ij poselok- nem~inowka 1 446 platforma setunx- movajskoe {osse 1 445 kuncewskaq- dawydkowo 1 444 kuncewskaq- movajskoe {osse 1 443 platforma setunx- movajskoe {osse- kuncewskaq 1 442 matweewskoe 1 441 matweewskoe 1 440 abonentow ats ne obnaruveno 1 439 solncewo- sowhoz moskowskij 1 438 leninskij prospekt (konec) 1 437 olimpijskaq derewnq- o~akowo 1 436 solncewo- wnukowo- aprelewka 1 435 solncewo 1 434 `go- zapadnaq 1 433 `go-zapadnaq- leninskij prospekt 1 432 prospekt wernadskogo- `go- zapadnaq 1 431 prospekt wernadskogo- `go-zapadnaq 1 430 prospekt wernadskogo- `go-zapadnaq- olimpijskaq derewnq 1 429 teplyj stan 1 428 abonentow ats ne obnaruveno 1 427 qsenewo 1 426 qsenewo 1 425 qsenewo 1 424 qsenewo 1 423 qsenewo 1 422 qsenewo 1 421 qsenewo 1 420 konxkowo- teplyj stan 1 42 simw. Y/ 1 42 Pitch Y/ 1 419 abonenty ats ne obnaruveny 1 418 abonenty ats ne obnaruveny 1 417 platforma rabo~ij poselok 1 416 abonenty ats ne obnaruveny 1 415 krylatskoe 1 414 rublewo 1 413 krylatskoe 1 412 krylatskoe 1 411 abonenty ats ne obnaruveny 1 410 abonenty ats ne obnaruveny 1 409 lianozowo 1 408 dolgoprudnyj 1 407 biberewo 1 406 biberewo 1 405 biberewo 1 404 otradnoe- medwedkowo 1 403 otradnoe 1 402 otradnoe- medwedkowo 1 401 otradnoe- platforma okruvnaq 1 400 lianozowo 1 4 fewralq 1972 g 1 3MCT21.DSC: 1 3LIB.AS C: 1 399 orehowo- krasnogwardejskaq 1 398 orehowo- krasnogwardejskaq 1 397 domodedowskaq- krasnogwardejskaq 1 396 domodedowskaq- krasnogwardejskaq 1 395 krasnogwardejskaq 1 394 domodedowskaq 1 393 orehowo- krasnogwardejskaq 1 392 orehowo- krasnogwardejskaq 1 391 domodedowskaq 1 390 orehowo- krasnogwardejskaq 1 389 abonenty ats ne obnaruveny 1 388 pravskaq- platforma krasnyj stroitelx 1 387 pravskaq- platforma krasnyj stroitelx 1 386 pravskaq- platforma krasnyj stroitelx 1 385 abonenty ats ne obnaruveny 1 384 bir`lewo 1 383 bir`lewo- zagorxe 1 382 pravskaq- krasnyj stroitelx 1 381 pravskaq- krasnyj sroitelx 1 380 bir`lewo 1 379 kuzxminki 1 378 kuzxminki- rqzanskij prospekt 1 377 wyhino- ul. golowa~ewa 1 376 wyhino- wolgogradskij prospekt 1 375 vowogireewo 1 374 wyhino- platforma we{nqki 1 373 nowogireewo 1 372 wyhino- wolgogradskij prospekt- ramenskoe 1 371 kuzxminki- wyhino 1 370 wyhino- nowogireewo 1 369 semenowskaq- izmajlowskij park 1 368-perowo 1 367 izmajlowskaq- perwomajskaq 1 366 semenowskaq 1 365 semenowskaq- sokolinaq gora 1 364 abonenty ats ne obnaruveny 1 363 abonenty ats ne obnaruveny 1 362 awiamotornaq- plo}adx ilxi~a 1 361 awiamotornaq 1 360 awiamotornaq- |lektrozawodskaq 1 359 l`blino 1 358 l`blino 1 357 marxino- platforma pererwa 1 356 marxino 1 355 kapotnq 1 354 pe~atniki 1 353 l`blino- pe~atniki 1 352 l`blino- marxino- kurxqnowo 1 351 l`blino 1 350 l`blino 1 349 abonentow ats ne obnaruveno 1 348 abonentow ats ne obnaruveno 1 347 abonentow ats ne obnaruveno 1 346 abonentow ats ne obnaruveno 1 345 abonentow ats ne obnaruveno 1 344 krasnogwardejskaq 1 343 orehowo 1 342 brateewo 1 341 brateewo 1 340 abonentow ats ne obnaruveno 1 339 teplyj stan 1 338 konxkowo- teplyj stan 1 337 teplyj stan 1 336 kaluvskaq- konxkowo 1 335 belqewo- konxkowo 1 334 kaluvskaq- belqewo- pos. watutinki 1 333 kaluvskaq- belqewo 1 333 222 33 1 332 nowye ~eremu{ki- z`zino 1 331 kaluvskaq- z`zino 1 330 belqewo- ul.ostrowitqnowa 1 329 zagorxe 1 328 bir`lewo 1 327 bir`lewo- zagorxe 1 326 bir`lewo 1 325 kantemirowskaq- lenino 1 324 ka{irskaq- kantemirowskaq 1 323 abonentow ats ne obnaruveno 1 322 kantemirowskaq- lenino 1 321 lenino- ka{irskaq 1 320 abonentow ats ne obnaruveno 1 32 simw/str 1 319 kahowskaq- sewernoe ~ertanowo 1 318 kahowskaq- sewernoe ~ertanowo 1 317 abonentow ats ne obnaruveno 1 316 ~ertanowskaq 1 315 `vnaq- pravskaq 1 314 `vnaq- pravskaq 1 313 `vnaq- pravskaq 1 312 ~ertanowskaq- `vnaq 1 311 ~ertanowskaq- `vnaq 1 310 kahowskaq- sewernoe ~ertanowo 1 309 perowo- platforma frezer 1 308 `vnoe izmajlowo 1 307 iwanowskoe 1 306 perowo 1 305 perowo- nowogireewo 1 304 perowo- nowogireewo 1 303 perowo- nowogireewo 1 302 perowo- nowogireewo 1 301 nowogireewo 1 300 nowogireewo- iwanowskaq 1 299 pu{kinskaq- maqkowskaq 1 298 #- zarqdxe 1 297 kurskaq- pokrowskij bulxwar 1 296 abonenty ats rasseqny po gorodu 1 295 abonenty ats ne obnaruveny 1 294 abonenty ats ne obnaruveny 1 293 abonenty ats rasseqny po gorodu 1 292 #- twerskaq ul. 1 291 arbatskaq- barrikadnaq 1 290 kalininskaq- plo}adx wosstaniq 1 289 rivskaq- sawelowskaq 1 288 kolhoznaq- plo}adx kommuny 1 287 }erbakowskaq 1 286 }erbakowskaq- platforma malenkowskaq 1 285 dinamo- platforma dmitrowskaq 1 284 prospekt mira- plo}adx kommuny 1 283 wdnh- platforma malenkowskaq 1 282 wdnh- ostankino 1 281 prospekt mira- plo}adx kommuny 1 280 prospekt mira- komsomolxskaq 1 279 awtozawodskaq- `vnyj port 1 278 plo}adx ilxi~a- nivegorodskaq ul. 1 277 plo}adx ilxi~a- awtozawodskaq 1 276 proletarskaq 1 275 awtozawodskaq- proletarskaq 1 274 proletarskaq- nivegorodskaq ul. 1 273 awiamotornaq- nivegorodskq ul. 1 272 taganskaq- proletarskaq 1 271 taganskaq- proletarskaq 1 270 plo}adx ilxi~a- proletarskaq 1 269 sokolxniki- |lektrozawodskaq 1 268 sokolxniki 1 267 baumanskaq- |lektrozawodskaq 1 266 komsomolxskaq 1 265 baumanskaq- kurskaq- lefortowo 1 264 krasnoselxskaq- sokolxniki 1 263 semenowskaq- preobravenskaq plo{adx 1 262 komsomolxskaq- krasnoselxskaq 1 261 komsomolxskaq- baumanskaq- kurskaq 1 260 abonenty ats ne obnaruveny 1 259 begowaq- {mitowskij proezd 1 258 nowoslobodskaq 1 257 belorusskaq- begowaq 1 256 ul.1905 goda- polevaewskaq- {mitowskij proezd 1 255 begowaq- krasnopresnenskaq 1 254 belorusskaq- krasnopresnenskaq 1 253 ul.1905 goda 1 252 begowaq- krasnopresnenskaq 1 251 belorusskaq- nowoslobodskaq 1 250 belorusskaq- sawelowskaq 1 249 studen~eskaq- kutuzowskaq 1 248 frunzenskaq- pl`}iha 1 247 park kulxtury- b.pirogowskaq ulica 1 246 kropotkinskaq- frunzenskaq 1 245 park kulxtury- sportiwnaq 1 244 park kulxtury- b.pirogowskaq ulica- smolenskaq 1 243 kutuzowskij prospekt- kiewskaq 1 242 frunzenskaq 1 241 kropotkinskaq- smolenskaq 1 240 kiewskaq- kutuzowskaq 1 239 oktqbrxskaq- dobryninskaq 1 238 polqnka 1 237 dobryninskaq- {abolowskaq 1 236 dobryninskaq- {abolowskaq 1 235 dobryninskaq- paweleckaq 1 234 tulxskaq- {abolowskaq 1 233 nowokuzneckaq 1 232 tulxskaq-{abolowskaq 1 231 nowokuzneckaq- polqnka 1 230 nowokuzneckaq- dobryninskaq 1 23.08.87C0u 1 229 #- pu{kinskaq 1 228 abonenty ats ne obnaruveny 1 227 kirowskaq- kurskaq- taganskaq 1 226 abonenty ats ne obnaruveny 1 225 abonenty ats ne obnaruveny 1 224 #- kirowskaq- kolhoznaq 1 223 abonenty ats ne obnaruveny 1 222 abonenty ats rasseqny po gorodu 1 220 #- bal~ug 1 219 ostankino- platforma timirqzewskaq 1 218 ostankino- marxina ro}a 1 217 ostankino 1 216 platforma gravdanskaq- platforma timirqzewskaq 1 215 ostankino 1 214 dinamo- belorusskaq 1 213 a|roport- dinamo- sawelowskaq 1 212 dinamo- platforma dmitrowskaq 1 211 platforma gravdanskaq- platforma timirqzewskaq 1 210 butyrskij hutor- platforma timirqzewskaq 1 209 pu{kinskaq- maqkowskaq 1 208 kolhoznaq- cwetnoj bulxwar 1 207 kolhoznaq- komsomolxskaq- krasnye worota 1 206 #-plo}adx nogina- pokrowskie worota 1 205 krasnopresnenskaq- ul. 1905 goda 1 204 krasnye worota- kolhoznaq- kirowskaq 1 203 kropotkinskaq- nikitskie worota 1 202 kropotkinskaq- nikitskie worota 1 201 kropotkinskaq- zubowskaq plo}adx 1 200 maqkowskaq-cwetnoj bulxwar 1 199 prospekt mar{ala vukowa- ulica tuha~ewskogo 1 198 oktqbrxskoe pole- sokol 1 197 prospekt mar{ala vukowa- oktqbrxskoe pole 1 196 }ukinskaq 1 195 begowaq- polevaewskq 1 194 oktqbrxskoe pole 1 193 }ukinskaq- wolokolamskoe {osse 1 192 prospekt mar{ala vukowa- ul.tuha~ewskogo 1 191 polevaewskaq- prospekt mar{ala vukowa 1 190 }ukinskaq- wolokolamskoe {osse 1 189 swiblowo 1 188 platforma losx- platforma losinoostrowskaq 1 187 botani~eskij sad- platforma quza 1 186 babu{kinskq- platforma losinoostrowskaq 1 185 abonenty ats ne obnaruveny 1 184 abonenty ats ne obnaruveny 1 183 platforma losx 1 182 platforma losx 1 181 wdnh- platforma sewerqnin 1 180 swiblowo- botani~eskij sad 1 179 tekstilx}iki 1 178 tekstilx}iki 1 177 kuzxminki 1 176 perowo- {osse |ntuziastow 1 175 kuzxminki- wolgogradskij prospekt (konec) 1 174 wyhino 1 173 tekstilx}iki- kuzxminki 1 172 kuzxminki- rqzanskij prospekt 1 171 rqzanskij prospekt- platforma pl`}ewo 1 170 abonenty ats ne obnaruveny 1 169 preobravenskq plo}adx- bogorodskoe 1 168 preobravenskaq plo}adx- otkrytoe {osse (na~alo) 1 167 ul. podbelxskogo- otkrytoe {osse (konec) 1 166 izmajlowskij park 1 165 izmajlowskaq- }elkowskoe {osse 1 164 perwomajskaq- }elkowskoe {osse 1 163 izmajlowskaq- }elkowskoe {osse 1 162 preobravenskq plo}adx 1 161 preobravenskaq plo}adx- ~erkizowskq 1 160 ulica podbelxskogo- otkrytoe {osse 1 159 wojkowskaq- wodnyj stadion 1 158 sokol- oktqbrxskoe pole 1 157 oktqbrxskoe pole- pes~anaq plo}adx 1 156 sokol- wojkowskq 1 155 a|roport- sokol 1 154 wojkowskaq- mihalkowo- platforma krasnyj baltiec 1 153 mihalkowo- b.akademi~eskaq ul. 1 152 a|roport- sokol 1 151 sokol- platforma krasnyj baltiec 1 150 sokol- wojkowskaq 1 149 molodevnaq- rublewskoe {osse 1 148 fili- filewskij park 1 147 mosfilxm- ramenki 1 146 filewskij park- pionerskaq 1 145 bagrationowskaq- filewskaq pojma 1 144 filewskij park- pionerskaq 1 143 mi~urinskij prospekt- mosfilxm 1 142 bagrationowskaq- filewskaq pojma 1 141 molodevnaq- krylatskoe- rublewo 1 140 kuncewskaq- molodevnaq 1 139 abonenty ats ne obnaruveny 1 138 prospekt wernadskogo- uniwersitet 1 137 uniwersitet- podolxsk- leninskij prospekt 1 136 abonenty ats ne obnaruveny 1 135 leninskij prospekt- akademi~eskaq 1 134 uniwersitet- nowye ~eremu{ki 1 133 prospekt wernadskogo- leninskij prospekt 1 132 uniwersitet- kaluvskaq 1 131 prospekt wernadskogo- uniwersitet 1 130 abonenty ats ne obnaruveny 1 129 akademi~eskaq- ~eremu{ki 1 128 nowye ~eremu{ki 1 127 nagornaq- ~eremu{ki 1 126 akademi~eskaq- profso`znaq 1 125 akademi~eskaq- profso`znaq 1 124 akademi~eskaq- ~eremu{ki 1 123 akademi~eskaq- zagorodnoe {osse 1 122 sewastopolxskij prospekt- kahowskaq 1 121 kahowskaq- profso`znaq- z`zino 1 120 profso`znaq- leninskij prospekt- nowye ~eremu{ki 1 119 ~ertanowskaq- war{awskaq- kahowskaq 1 118 kolomenskaq- awtozawodskaq 1 117 kolomenskaq 1 116 nagatinskaq- kolomenskaq 1 115 kolomenskaq- nagatinskij zaton 1 114 kolomenskaq- ka{irskaq 1 113 war{awskaq- ka{irskaq 1 112 nagatinskaq- kolomenskaq 1 111 war{awskaq- ka{irskaq 1 0tlw.mel_B 1 0tlw.mel C 1 0iEpole uve w zapisi 1 0SUMMARY SORTED BY NAM 1 0Press Q to see full menu 1 0123456789ABCDEF 1 00000000000.000000285527.0 1 00000000000.0000000000000.00 1 00000,00000 1 /tlw.mel B 1 /baud rate-101 1 /TLW.MEL BA 1 /Graphiks/" 1 /Graphics/"' 1 /@FISWUAPR[OLDXT]ZJKYEGMC^NQH\VB_`fiswuapr{oldxt}zjkyegmc~nqh|vb! 1 /*************** 1 /****** FILE SYSTEM ******/ 1 /*** System Interface ***/ 1 /* Storage Alloc. Structure and Variables */ 1 /* Spectrum Graphics and 1 /* Some arithmetic functions */ 1 /* Last changed 20 Nov 1984 */ 1 /* Last changed 10 Dec 1984 */ 1 /* Functions for 32 bit int. arithmetic */ 1 /* Char. Test and Manipulate. */ 1 /* grub around in the store */ 1 /* from "Learning to Program in C" */ 1 /* built-in for efficiency */ 1 /* Version for ZX Spectrum */ 1 /* String Handling Functions */ 1 /* Storage Allocation and Freeing */ 1 /* Sorting function - a Shell sort */ 1 /* Pseudo-Random Number Generator */ 1 /* NB - the common ones are */ 1 /* Function type forward declarations */ 1 /* Format conversion routine */ 1 /* File system Structure */ 1 /* An illustration of how to */ 1 /* - ASCII to binary integer */ 1 /* Header for ZX Spectrum */ 1 /* for non-int library functions */ 1 /* (Heap Management) */ 1 /* End Header */ 1 /* End */ 1 -udalenie- 1 -redakciq- 1 -dos.c Cpb 1 -U<G> k-K m-M<G> 1 -T<G> B-B K-K T-T 1 -R<G> 3-3< 1 -P<G> q-Q 1 -P; " bajt" 1 -N<G> x-X 1 -N<G> C-C 1 -L<G> y-Y 1 -J<G> o-O 1 -J<G> O-O 1 -I<G> p-P 1 -I<G> P-P 1 -H<G> r-R 1 -G<G> n-N 1 -E<G> e-E 1 -E<G> E-E H-H X-X 1 -D<G> c-C 1 -D<G> M-M 1 - Print calls etc 1 - LET Basic variables 1 ,stdio.l Cpb 1 ,otredaktiruj" : 1 ,e;" "' 1 ,," KATA 1 ,," CTAH 1 ,," COPT 1 ,"SP",3450 1 ,"P-",3360 1 ,"IY",3450 1 ,"IX",3450 1 ,"HL",3450 1 ,"HELP",7500 1 ,"DE",3450 1 ,"BR",3400 1 ,"BC",3450 1 , gde Y - wertikalxnaq koordinata w znakomestah , a X - gorizontalxnaq w pikselqh" 1 , (P-256 1 +stdio.h Cpb] 1 +pr40/50RC 1 +"Title: " 1 +" - "+ 1 + Del file 1 *pERERABOTAN DLQ ms6312* 1 *W\#"S\"K\6 1 *RATCOPY COLLECTION* FORMAT NO 1 *PR40/50RB 1 *+\"!R*-\"+\ 1 ***{tabskaq galina 285-37-94**************************************************************************** 1 ***RUSSIAN LETTERS*** 1 *********************** Disk version by Kunkov AV ***** ******************************* 1 **** RUSSI SHRIFT ***** 1 **** LATIN SHRIFT ***** 1 *** ENGLISH LETTERS *** 1 *"m";n;"cc.code" 1 * SAGA SYSTEMS LIMITED * 1 * aDAPTIROWAN d.g.s. * 1 * CAT to TLW v2.2 * 1 * 1990 * 1 )pr40/50 C 1 )PR40/50 B 1 );a$(a+l,17 1 );a$(a+l,11 1 );("~spill~" 1 );""" uve estx na diske. ","OVERWRITE? Y/N": 1 );""" uve estx na diske." 1 );" markers" 1 );" Line feed="; 1 )"''"2- 3A 1 (sy<<8)+sx; 1 (single/255.99999 1 (rEWIZI/pRINT/wYHOD)? 1 (not recorded 1 (not assigned 1 (no address entered for this record. 1 (double/255.99999 1 (bank C 1 (addr+C),B: 1 (U-th/nOW/wYHOD)? 1 (Fnaj/S zam/wyhod)? 1 (C$(M));" HOB 1 (BAUD/255.99999 1 (B$(M));"HOB 1 (Alfavit B 1 (Alf.codeCQ 1 (+)(-) C A P S L O C K 6 1 ("Enter key for '";s$;"' ? "); 1 'a;" wires in print head "; 1 'a;" dots in single density mode" 1 'a;" dots in double density mode" 1 'FASTER BASIC' OPERATING SYSTEM By Richard Taylor August,1984 1 '': 1 ''''''''" 1 1 ''"File ~marked~, will re-SAVE withsame name/new length ";l 1 ''" Ta 1 '"plohoe imq!" 1 '"pPi 3ApPE&EHii pPEPyBAHiq OTlAd-@iK OCTAHETCq PAbOTOCpOCObEH." 1 '"net w kataloge!": 1 '"katalog polon!": 1 '"fajl '";: 1 '"disk polon!": 1 '"Start your tape": 1 '"Revising the text-file now" 1 '"No single density mode": 1 '"No double density mode": 1 '"Getting file": 1 '"Control codes before dump:" 1 '"Carriage return="; 1 '" a-A 1 '" A-A 1 &D100-M C 1 $$$$~B~@@x@@~ 1 $!!I# !!#!!!!!# 1 $!!I# !!#!!!! 1 #red2mx C 1 #ka;"A-ABTOMO 1 #ka;" HA 1 #define HEAPSIZE 1000 1 #define void int 1 #define TRUE 1 1 #define NULL 0 1 #define FALSE 0 1 #define ERROR -1 1 #define EOF -1 1 #^#V#N#F#n& 1 #Cat BankB 1 ##~#^#V*h\ 1 #"a\"c\"e\* 1 #"a\"c\"e\! 1 "wyberite tablicu simwolow:"''"'grafika 2'-> 1 "uips.lin" 1 "uips.drv" 1 "tlw.mel_" 1 "tlw+.drw" 1 "teku}ij fajl stiraem?": 1 "tasword RL" 1 "swobodno ";64000 1 "swobodno ";35999 1 "smenite bumagu": 1 "s - save text file"''"j - load text file"''"m - merge text file"''"y - return to text file"''"b - Basic" 1 "re-SAVEING on disk [ 1-4 ]";s 1 "prof.drv" 1 "poslednqq stroka? ",s2: 1 "perwaq stroka? ",s1: 1 "pent.drv" 1 "pcop+1.1" 1 "odd parity,"; 1 "nomer stranicy? ",n1: 1 "no parity,";: 1 "naberajte komandu pobajtno"''"konec komandy->~islo>255": 1 "mon45000" 1 "m80 .lin" 1 "m80 .drv" 1 "lprn.lin" 1 "kOOPERATIW *bajt*" 1 "even parity,"; 1 "dlq zapisi programmy na disk naberite 1 "dliHA ? "; 1 "dAHHyE (n-kod) "; 1 "cuke.z.h" 1 "cuke.z.g" 1 "art.stud" 1 "art.hlp6" 1 "art.hlp5" 1 "art.hlp4" 1 "art.hlp3" 1 "art.hlp2" 1 "art.hlp1" 1 "art.hlp0" 1 "^islo strok w stranice? ",l1: 1 "\,@.B;VaFbIcSdWeKfAgPhRi]jOkLlDmXnToZpHqCrEsYtNu[vMwUx^yGzQ 1 "Which line (1-8) ? ";e: 1 "User-own driver": 1 "User-defined keys","Interface 2 joystick","Kempston joystick","Cursor keys/joystick","AMX mouse" 1 "UNIBASE+" 1 "To insert -",("~firm~" 1 "TLW64BASIC+" MELsoft 1 "TLW64BASIC has LOAD'ed"'"Now CLEAR'ed to 29999 and","LOAD'ing TLW64CODE"''"[this is 75 bytes long at 65000]": 1 "Select interface ? "; 1 "Select input device ? "; 1 "S\"K\"U\#"Y\ 1 "Press any key";q$: 1 "Press any key to exit" 1 "Parity on or off ? "; 1 "Parity odd or even ? "; 1 "PR40/50R" 1 "Original line-length ?"'" [ from 32 to 131 ] "''l 1 "Original file size ? [ bytes ]"'"(TLW ... can tell you)"''l 1 "ONE MORE TIME - 1"'"STOP - 0" 1 "New Name-";f$: 1 "Name ('prn' for print catalogue)- ";B$ 1 "MF mcode" 1 "MAST.sum" 1 "List 1 or 2 ? ";d: 1 "LOAD from tape [0] or from","Disk [1 1 "KOdy COXPAHiTx ? [Y/N ]? "; 1 "KOMAHdA : "; 1 "KAPTOTEKA 1 "Is this correct (y or n) ? "; 1 "Is this all OK ? [y] ";z$ 1 "Is the top wire the m.s.b."'"(y or n) ? "; 1 "Insert ~firm markers~ [y] ?"'"else ~spills~"''z$ 1 "Input name of TLW's code block ";x$ 1 "Inoder to continue -"'" press :"'"1 - 1 "HA@AlxHyj AdPEC ? "; 1 "File to LOAD ? [ENTER to stop]"''f$ 1 "FILES INCLUDE NUMBER= ";d 1 "Enter scaling factor (1 to 5) ? "'; 1 "Enter number of wires in print"'"head (7 or 8) ? "; 1 "Enter number of stop bits"'"(1 or 2) ? "; 1 "Enter number of dots in single"'"density mode ? "; 1 "Enter number of dots in double"'"density mode ? "; 1 "Enter number of data bits"'"(7 or 8) ? "; 1 "Enter control code for line"'"feed ? "; 1 "Enter control code for carriage return ? "; 1 "Enter baud rate ? "; 1 "ENTER NAME OUTPUT FILE ";C$ 1 "ENTER NAME FORMAT-FILE ";c$ 1 "ENTER INCLUDE FILE ";c$ 1 "Disk [ 1-4 ]";di: 1 "Correct data [y] ? ";a$: 1 "Centronics" 1 "COPY4.EX" 1 "CODEMASTER" 1 "C"+"Kempston 'S'","C"+"Kempston 'E'","C"+"Tasman type A","C"+"Tasman type B/1","C"+"Tasman type B/2","R"+"Tasman serial","C"+"Hilderbay","C"+"Morex","R"+"Morex","R"+"ZX Interface 1","C"+"ZX Lprint II/III","R"+"ZX Lprint II/III","C"+"Micro Peripherals","C"+"Direco","C"+"Dk'tronics","C"+"AMX","C"+"Indescomp","R"+"Indescomp" 1 "Baud rate=";baud rate 1 "Basic program to revise non-TLW ~CODE~ text-files to ~marked~ format" 1 "Are you using an 80-column dot"'"matrix printer (y or n) ? "; 1 "Alf.code" 1 "ART=STUD" 1 "A:RODIONOV" 1 "9";"A L F A V I T"; 1 "9";" ";l$;" "; 1 "7";" 8-katalog diska " 1 "7";" 7-zapisx na disk "; 1 "7";" 6-~tenie s diska"; 1 "7";" 5-o~istka"; 1 "7";" 4-udalenie"; 1 "7";" 3-redaktirowanie "; 1 "7";" 2-zanesenie"; 1 "7";" 1-poisk"; 1 "7";" ": 1 "65357",Z: 1 "62237";" stroki": 1 "61343",l: 1 "61341",hh: 1 "61340",ll: 1 "61316",a(n): 1 "6";"~The Last Word ...~", 1 "5";"wkl`~itx printer"''"1 - prostaq pe~atx"''"2 - strani~naq pe~atx": 1 "5";"simwol uprawleniq:"''"ne pe~ataetsq -> 1 "5";"prod. ": 1 "4";a(m);: 1 "4";"navmite 1, esli da"; 1 "4";"komanda nabrana. wywod?": 1 "4";"imq teksta dlq zapisi ?": 1 "4";"Save the result on disk ?": 1 "3HA@EHiE : "; 1 "34";"The Last Word ..."; 1 "34";" Command key-set"'" ==================================="' 1 "34"+"The Last Word ..."+ 1 "34"+" printer control token file content.": 1 "3";" Y.Kovalevsky /Leningrad/ 1991": 1 "29999",t* 1 "28001",P- 1 "255.User-own driver" 1 "23329"+i, 1 "23323": 1 "23303"+N+1 1 "23297"+n): 1 "23297"+i, 1 "23296",L: 1 "21";"""";l$;""""'''': 1 "14",q;t''''''': 1 "13";"0, esli net" 1 "13";"""";l$;""""'''': 1 "12";"prod.?"; 1 "12";"imq fajla?" 1 "11";"( y / n )" 1 "10";"zamenitx na:"; 1 "0";a;" bajta,",a/ 1 "0";"tekst ";: 1 "0";"perwaq stroka: nomer ? ";: 1 "0";" (WK, esli nuvno tolxko najti)": 1 "..................katalog diska","....................wyhod w SOS",".................wyhod w TR-DOS","..............wozwrat w UNIBASE","...........................MOVE" 1 ","W-BOEHH 1 ","T-TPEXMEPH 1 ","G-CTPATE 1 "+";a$(a+l,13 1 "*******PENCRAFT SOFTWARE*******" 1 "******** PRINTER O'KEY ********" 1 "(top=msb)" 1 "(top=lsb)" 1 "'To' code (32-127) ? ";g: 1 "'From' code (32-127) ? ";f: 1 "''"pe~ataetsq dwumq probelami-> 1 "''"8- KATA 1 "''"'sowme}ennyj polnyj'-> 1 "' uve estx w kataloge!": 1 ""ub.font"" FILE THAT IS NESSESARY TO RE-CREATE IT IS ABSENT ON THIS DISK. INSERT DISKCONTAINING ""ub.font"" FILE AND PRESS ANY KEY. ": 1 """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""": 1 " zapisan:"; 1 " Save changes ?"'" y / n" 1 " Press any key, sir..." 1 " Input name of new TLW's code block ?";x$ 1 " Inoder to working with that"'"programm, you must loading"'"the CODE part of TLW programm." 1 " Disk [ 1-4 ]";di 1 " Centronics" 1 " But remember, that you'l must"'"RENAME your new TLW's code"'"block on a STANDART name ,"'"inoder to use it in TLW !" 1 " BEFORE your working with that"'"programm, you must load your"'"DRIVER, because you'l be "'"working with printer."'" "'" Codes, that sweechs rus/lat"'"shrift on your printer, are in"'"subroatines on lines 7600 &7700."'" Correct that lines, if it needs" 1 " =RANDOMIZE USR 23296 for COPY=" 1 " =======================================================" 1 " 'TLW ...' translation lists"'" ==========================="'''; 1 " SAGA SYSTEMS LIMITED"'" [c] Myrmidon Software 1986"'" ==========================" 1 " Disk version and modornization"'" by Kunkov AV"'" [c] MELsoft 29.1.1992"'" =======================" 1 " B KAPTOTEKE ";n;" 1 " COPY-LPT driver v.1.0" 1 " EXTEND MODE-B 1 " 28.01.1992 1 !red1 C0u 1 !!>"9"!I>- 1 !!"">!>%>!> 1 !!"" >*)!? 1 !!"" !I#!! 1 !!"" I1!! 1 !! "!"!I 3 1 ~ | \ { } ! 1 unsigned duration,pitch; 1 to translate ? 1 static sx,sy,de,bc; 1 static ft; 1 static de,hl; 1 static bc,de,hl; 1 return _colour(17,i); 1 return _colour(16,i); 1 printf("\025%c",on?0:1); 1 pitch=pitch/10; 1 m e "; 1 kypcopa"' 1 kordial * 1990 1 intrw 011 1 inline(0xed,0x5b,&de, 1 inline(0xdd,0xe5, 1 inline(0xdd,0x46,4, 1 inline(0xcd,25236); 1 inline(0xc5,0xd5,0xe5, 1 if (dy<0) 1 if (dx<0) 1 if ( ! pitch) 1 i instrukcji umieszczonych w liniach 9990-9992, ktore musza zostac wykonane w celu ~uruchomienia~ trybu tak ~zageszczonego~ pisania." 1 ft=duration*pitch/10; 1 c=c/shift s=s/shift e=extended E=e+s/shift 1 bc=(dy<<8)+dx; 1 at cursor y! 1 at cursor : 1 aqpec:";t: 1 _exit(n); 1 _beep(ft,cast(unsigned)43750/pitch-30); 1 The town of Gatchina 1 TR-DOS =";j: 1 Start-up of file 1 Save file 1 SII 31.1.92 * 1 SII 31.1.1992 ": 1 Recs=00001 Sel=00001 Spa=31726 1 Read title 1 Read catalog 1 Quit 1 Printer on 1 New name of file 1 Myrmidon Software. 1 Myrmidon Software 1986",: 1 MELsoft St.Pb * 1 Load file 1 LX-800>>> Line 1 Col 1 W\W (+) Insert (+) 1 LX-800>>> 1 LICZBA ZNAKOW W LINII 1 L.Kluev: microprint fonts"; 1 L.Kluev: fonts' installation";#1 1 K=K/[IFT S=S/[IFT E="e" KOM. e=E+S/[IFT 1 Intvl 002 1 I.Dumov: 32 chr$/line font";; 1 Homesoft 1988 " 1 GPI SERVICE 1991 1 File menu 1 Disk drive of 1 Corrections by MELsoft" 1 Copying file from tape to dis 1 Copying file from disk to tape 1 Catalog or File? 1 Catalog 1 BASIC file 1 B CTPOKE"'B: 1 ALL file 1 50 zn/str 1 50 zn/lin 1 40 zn/str 1 40 zn/lin 1 32 zn/str 1 32 zn/lin 1 1993 VLADIMIR VASILEVSKIJ.MiPh&T HACKER CLUB. 1 1992 SHISOFT Adaption 1 1991 St.Pb. ": 1 1990, MOA Service V01.05 1 1990 MOA Service 1 1990 MOA Service 1 1990 LENINGRAD 1 1990 *RATCOPY COLLECTION* NO 1 1984 HISOFT 1 1984 HISOFT ": 1 - zapisx teksta "'"2 1 - zagruzka teksta "'"3 1 - wozwrat k tekstu "'"6 1 - tablica simwolow "''"0 1 - revim pe~ati "'"8 1 - pe~atx" 1 - peremena polej "'"7 1 - odino~naq komanda"'"5 1 - dozagruzka teksta"'"4 1 - bejsik"''" 1 (bez imeni 1 (Not named 1 "TLPR3.EX" 1 ";(N);" ";B$(N): 1 ";(N)'C$(N): 1 !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~@ 1 zap=00000 wyb=00000 swb=29196 1 will always be compiled into your 1 while (putchar(*s++)); 1 while (isspace(*s)) ++s; 1 while (isdigit(c = *s++)) value = 10 * value + c - '0'; 1 while (c = *s++) putc(c, fp); 1 while (TRUE) 1 while (--n > 0 && (c = getc(fp)) != EOF) 1 while (*s++) ++length; 1 while (*s == *t) 1 while (*dest++ = *source++) ; 1 while (*base++ = *add++); 1 while (*base) ++base; 1 while ((c = getchar()) 1 value = 0; 1 unsigned u, i; 1 unsigned n; 1 unsigned n1,n0; 1 unsigned n, d; 1 unsigned _size; 1 unsigned n, size; 1 two arithmetic functions vhich need 1 to be declared BEFORE they are used, 1 struct _header * _ptr; 1 static unsigned length; 1 static unsigned gap, byte_gap, i; 1 static unsigned nbytes; 1 static int i; 1 static int c, value, sign; 1 static int argc, *argv, min; 1 static int argc, *argv, max; 1 static int c; 1 static char x[4], product[4]; 1 static char p, 1 static char k[4]; 1 static char *p; 1 static HEADER *p, *q; 1 static HEADER *p, *q; 1 sign = 1; 1 routines if you want to compile a large 1 return result; 1 return p; 1 return max; 1 return *s - *t; 1 return ((c == EOF && cs == s) ? NULL : s); 1 return sign * value; 1 return result; 1 return n<0 ? -n : n ; 1 return n ? 1 return length; 1 return isprint(c) & ! isalnum(c); 1 return isalpha(c) | isdigit(c) ; 1 return c >= ' ' & c < '\177' ; 1 return c < 0x80 ; 1 return c < ' ' | c == '\177' ; 1 return * cast(__char_ptr) address; 1 return (_rnum[1] << 8) + _rnum[0]; 1 result = dest; 1 result = base; 1 program. You may wish to make a version 1 p=heap_ptr; 1 p = q->_ptr; 1 p = cast(HEADER_PTR) (block - 1); 1 of this file without these two 1 number of arguments). This means that 1 nbytes = (n * size + (sizeof(HEADER) - 1)) / sizeof(HEADER) + 1; 1 move(c, a, 4); 1 moskwa * 1989 1 min and max are in "stdio.h" 1 min = 32767; 1 max = -32767; 1 long_set(product, 0,0); 1 long_multiply(_rnum, _rnum, k); 1 long_init(k, 0x41c6,0x4e6d); 1 long_init(k, 0,0x3039); 1 long_init(_rnum, 0,n); 1 long_copy(c, product); 1 long_add(_rnum, _rnum, k); 1 length = 0; 1 int i, j; 1 int (*cmp_func)(); 1 int num_items, size; 1 int n; 1 inline(0xe1,0xe1,0xe1, 1 inline(0xCD,0xD6B); 1 if you include "stdio.h" these functions 1 if (q + q->_size == p) 1 if (p + p->_size == q->_ptr) 1 if (heap_ptr+n > heap+HEAPSIZE) return ERROR; 1 if (d < 3) a[d+1] = n >> 8; 1 if ((q = _allocp) == NULL) /* no free list */ 1 if (*s == '-') { ++s; sign = -1; } 1 heap_ptr += n; 1 for(ft=0;ft<duration;++ft) 1 for (q = _allocp; !(p > q && p < q->_ptr); q = q->_ptr) 1 for (i=0; i<4; ++i) a[i] = 0; 1 for (gap = num_items>>1; gap>0; gap >>= 1) 1 else if (*s == '+') ++s; 1 else q->_ptr = p; 1 else p->_ptr = q->_ptr; 1 char *s, *t; 1 char *list; 1 char *dest, *source; 1 char *block; 1 char *base, *add; 1 char *a, *c; 1 because they are variadic (take any 1 because they are variadic 1 bc=NSEC*256+6; 1 bc=NSEC*256+5; 1 amount of code and don't need them. 1 a[d] = n & 0xff; 1 a[3] = n1 >> 8; 1 a[2] = n1 & 0xff; 1 a[1] = n0 >> 8; 1 a[0] = n0 & 0xff; 1 _allocp = q; 1 [ENTER]-Yes/No 1 Size of a 1 MAST. FILE UTILITY v3.01 1 Leningrad 1 Continue ? 1 Catalog savid 1 *cs = 0; 1 *cs = '\0'; 1 * cast(__char_ptr) address = value; 1 wyzywaetsq komandoj 1 sy= -1; 1 sx= -1; 1 for(pitch=4630;++pitch;); 1 dy= -dy; 1 dx= -dx; 1 Sound Functions */ 1 Find name 1 Disk Version by A.V.Kunkoff ON APREL 1991 St. Petersburgh 1 0x2b,0xc3,0x55,0); 1 ((c==-1 && cs==s) ? 1 "MERCURY" - 1 } /* end while TRUE */ 1 r$>"8" 1 if (q >= q->_ptr && (p > q || p < q->_ptr)) break; 1 if ((*cs++ = c) == '\n') break; 1 heap_ptr=heap; 1 heap[HEAPSIZE], 1 for (j = i; j >= 0; --j) 1 NULL : s ); 1 Dumping 1 Copy files 1 ( n<0 ? -1 : 1 ) : 0 ; 1 !=EOF && c!='\n') 1 SII & MELsoft 1992 1 ","P-C 1 u >>= 8; 1 u += *a++ + *b++; 1 q->_size += p->_size; 1 q->_ptr = p->_ptr; 1 q = p; 1 p->_size += q->_ptr->_size; 1 p->_ptr = q->_ptr->_ptr; 1 p = p->_ptr; 1 if (p->_size >= nbytes) /* big enough */ 1 if (p == _allocp) /* wrapped around free list */ 1 if (*argv > max) max = *argv; 1 if (! *s) return 0; 1 for (i = gap; i < num_items; ++i) 1 byte_gap = gap * size; 1 _base._size = 0; 1 _base._ptr = _allocp = q = &_base; 1 File 1 -1": 1 ++s; ++t; 1 *cs++ = c; 1 *c++ = u & 0xff; 1 -5": 1 long_set(x, a[i-j] * b[j], i); 1 long_add(product, product, x); 1 for (p = list + i * size - byte_gap; p >= list; p -= byte_gap) 1 23302 1 0xe1,0xd1,0xc1); 1 0xdd,0xe1); 1 0xdd,0x4e,6, 1 0xcd,15635, 1 0xcd,0x3b5, 1 0xcd,0x24ba); 1 0xcd,0x22e5); 1 } 1 { 1 return cast(__char_ptr) (p+1); 1 p->_size = nbytes; 1 p = _allocp; 1 if (p->_size == nbytes) q->_ptr = p->_ptr; /* just right size */ 1 if ((p = cast(HEADER_PTR) sbrk(nbytes * sizeof(HEADER))) == ERROR) 1 free(p+1); 1 else 1 _allocp = q; 1 L - large printing on marker MARGINS K - large printing off marker A - set left margin at cursor S - reset margins to normal 1 } 1 { /* split block and allocate tail */ 1 swap(p, p + byte_gap, size); 1 return NULL; 1 if ((*cmp_func)(p, p + byte_gap) <= 0) break; 1 " 1 p->_size -= nbytes; 1 p->_size = nbytes; 1 p += p->_size; 1 N - copy marked block to cursorARROWS - cursor movement M - move marked block to cursor SYMBOL SHIFT and key to type these characters: [ ] 1 A zatem 1 -%& 1 - 1 X - clear text f 1 * * 1 r 1 1 1 1 1 1